﻿Imports System
Imports System.IO
Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Formatters.Binary
<Serializable()> Public Class NO2Ratio
    Implements ICloneable

    Private m_Selected As Boolean = False
    Private m_NO2Ratio As Double = 0.1
    ''' <summary>
    ''' 是否指定NO2的排放比例
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Selected() As Boolean
        Get
            Return Me.m_Selected
        End Get
        Set(ByVal value As Boolean)
            Me.m_Selected = value
        End Set
    End Property
    ''' <summary>
    ''' NO2的排放比例
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property NO2Ratio() As Double
        Get
            Return Me.m_NO2Ratio
        End Get
        Set(ByVal value As Double)
            Me.m_NO2Ratio = value
        End Set
    End Property

    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim obj As New NO2Ratio
        obj.m_Selected = Me.m_Selected
        obj.m_NO2Ratio = Me.m_NO2Ratio
        Return obj
    End Function
End Class
